/***** BEGIN LICENSE BLOCK *****
 * Version: CPL 1.0/GPL 2.0/LGPL 2.1
 *
 * The contents of this file are subject to the Common Public
 * License Version 1.0 (the "License"); you may not use this file
 * except in compliance with the License. You may obtain a copy of
 * the License at http://www.eclipse.org/legal/cpl-v10.html
 *
 * Software distributed under the License is distributed on an "AS
 * IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
 * implied. See the License for the specific language governing
 * rights and limitations under the License.
 *
 * Copyright (C) 2002 Jan Arne Petersen <jpetersen@uni-bonn.de>
 * Copyright (C) 2002-2004 Anders Bengtsson <ndrsbngtssn@yahoo.se>
 * Copyright (C) 2005 Thomas E Enebo <enebo@acm.org>
 * 
 * Alternatively, the contents of this file may be used under the terms of
 * either of the GNU General Public License Version 2 or later (the "GPL"),
 * or the GNU Lesser General Public License Version 2.1 or later (the "LGPL"),
 * in which case the provisions of the GPL or the LGPL are applicable instead
 * of those above. If you wish to allow use of your version of this file only
 * under the terms of either the GPL or the LGPL, and not to allow others to
 * use your version of this file under the terms of the CPL, indicate your
 * decision by deleting the provisions above and replace them with the notice
 * and other provisions required by the GPL or the LGPL. If you do not delete
 * the provisions above, a recipient may use your version of this file under
 * the terms of any one of the CPL, the GPL or the LGPL.
 ***** END LICENSE BLOCK *****/
package asruby.runtime.methods {

import asruby.lang.MetaClass;
import asruby.lang.RubyModule;
import asruby.lang.RubyObject;
import asruby.runtime.Arity;
import asruby.runtime.Block;
import asruby.runtime.CallType;
import asruby.runtime.IRubyObject;
import asruby.runtime.ThreadContext;
import asruby.runtime.Visibility;

/**
 *
 * @author  jpetersen
 */
public class DynamicMethod {
	
    protected  var implementationClass:RubyModule;
    protected  var visibility:Visibility;
    protected  var callConfig:CallConfiguration;
    
    public  function DynamicMethod(implementationClass:RubyModule, visibility:Visibility, callConfig:CallConfiguration){
        this.visibility = visibility;
        this.implementationClass = implementationClass;
        this.callConfig = callConfig;
    }

    /**
     * Call the method
     * @param context is the thread-specific information that this method is being invoked on
     * @param receiver 
     */
    public function call(context:ThreadContext, self:IRubyObject, klazz:RubyModule, name:String,
            args:Array, block:Block):IRubyObject {
       return null;
    }
        
    public  function call1(context:ThreadContext, self:IRubyObject, klazz:RubyModule, name:String):IRubyObject{
        return call(context, self, klazz, name, RubyObject.NULL_ARRAY, Block.NULL_BLOCK);
    }
    
    public  function call2(context:ThreadContext, self:IRubyObject, klazz:RubyModule, name:String, block:Block):IRubyObject{
        return call(context, self, klazz, name, RubyObject.NULL_ARRAY, block);
    }
    
    public  function call3(context:ThreadContext, self:IRubyObject, klazz:RubyModule, name:String, arg:IRubyObject):IRubyObject{
        return call(context, self, klazz, name, [arg], Block.NULL_BLOCK);
    }
    
    public  function call4(context:ThreadContext, self:IRubyObject, klazz:RubyModule, name:String, arg:IRubyObject, block:Block):IRubyObject{
        return call(context, self, klazz, name, [arg], block);
    }
    
    public  function call5(context:ThreadContext, self:IRubyObject, klazz:RubyModule, name:String, arg1:IRubyObject, arg2:IRubyObject):IRubyObject{
        return call(context, self, klazz, name, [arg1,arg2], Block.NULL_BLOCK);
    }
    
    public  function call6(context:ThreadContext, self:IRubyObject, klazz:RubyModule, name:String, arg1:IRubyObject, arg2:IRubyObject, block:Block):IRubyObject{
        return call(context, self, klazz, name, [arg1,arg2], block);
    }
    
    public  function call7(context:ThreadContext, self:IRubyObject, klazz:RubyModule, name:String, arg1:IRubyObject, arg2:IRubyObject, arg3:IRubyObject):IRubyObject{
        return call(context, self, klazz, name, [arg1,arg2,arg3], Block.NULL_BLOCK);
    }
    
    public  function call8(context:ThreadContext, self:IRubyObject, klazz:RubyModule, name:String, arg1:IRubyObject, arg2:IRubyObject, arg3:IRubyObject, block:Block):IRubyObject{
        return call(context, self, klazz, name, [arg1,arg2,arg3], block);
    }
    
    public function dup():DynamicMethod {return null};

    public  function isCallableFrom(caller:IRubyObject, callType:CallType):Boolean{
        switch (visibility) {
        case Visibility.PUBLIC:
            return true;
        case Visibility.PRIVATE:
            return callType != CallType.NORMAL;
        case Visibility.PROTECTED:
            // TODO: Determine whether we should perhaps store non-singleton class instead
            var defined: RubyModule =  getImplementationClass();
            
            // singleton classes don't get their own visibility domain
            if (defined.isSingleton()) defined = defined.getSuperClass();
            
            while (defined.isIncluded()) defined = defined.getMetaClass();
            
            // For visibility we need real meta class and not anonymous one from class << self
            if (defined instanceof MetaClass) defined = MetaClass(defined).getRealClass();

            return defined.isInstance(caller);
        }
        
        return true;
    }
    
    public  function getImplementationClass():RubyModule{
        return implementationClass;
    }

    public  function setImplementationClass(implClass:RubyModule):void{
        implementationClass = implClass;
    }

    public  function getVisibility():Visibility{
        return visibility;
    }

    public  function setVisibility(visibility:Visibility):void{
        this.visibility = visibility;
    }

    public  function isUndefined():Boolean{
        return false;
    }

    public  function getArity():Arity{
        return Arity.optional();
    }
    
    public  function getRealMethod():DynamicMethod{
        return this;
    }

    public  function getCallConfig():CallConfiguration{
        return callConfig;
    }

    public  function setCallConfig(callConfig:CallConfiguration):void{
        this.callConfig = callConfig;
    }
    
    /**
     * Returns true if this method is backed by native (i.e. Java) code
     */
    public  function isNative():Boolean{
        return false;
    }
}
}